home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / plain / contrib / springer / pjour2 / xplain.tex < prev   
Encoding:
Text File  |  1991-09-14  |  1.2 KB  |  33 lines
  1. \catcode`\{=1 % left brace is begin-group character
  2. \catcode`\}=2 % right brace is end-group character
  3. \catcode`\#=6 % hash mark is macro parameter character
  4. %
  5. \let\x=\input \def\input#1 {\let\input=\x \let\x=\undefined}
  6. %
  7. \let\qayb=\font
  8. \def\font#1=#2 {\def\qayba{#1}\def\qaybb{#2}
  9.                 \def\qaybf{\preloaded}
  10.                 \def\qaybg{\tenrm}\def\qaybh{\tenex}
  11.                 \def\qaybu{cmr7}\def\qaybv{cmtt10}\def\qaybw{cmssbx10}
  12.                 \ifx\qayba\qaybg \qayb#1=#2
  13.                 \else\ifx\qayba\qaybh \qayb#1=#2
  14.                 \else\ifx\qayba\qaybf
  15.                   \ifx\qaybb\qaybu \qayb#1=#2
  16.                   \else\ifx\qaybb\qaybv \qayb#1=#2
  17.                   \else\ifx\qaybb\qaybw \qayb#1=#2 \fi\fi\fi
  18.                 \fi\fi\fi}
  19. %
  20. \let\qayc=\skewchar \def\skewchar#1=#2 {\relax}
  21. \let\qayd=\textfont \def\textfont#1=#2{\relax}
  22. \let\qaye=\scriptfont \def\scriptfont#1=#2{\relax}
  23. \let\qayf=\scriptscriptfont \def\scriptscriptfont#1=#2{\relax}
  24. %
  25. \x plain
  26. %
  27. \let\font=\qayb \let\qayb=\undefined
  28. \let\skewchar=\qayc  \let\qayc=\undefined
  29. \let\textfont=\qayd  \let\qayd=\undefined
  30. \let\scriptfont=\qaye  \let\qaye=\undefined
  31. \let\scriptscriptfont=\qayf  \let\qayf=\undefined
  32. %
  33.